Microsoft® Visual Basic® Scripting Edition AtEndOfStream Property |
Language Reference
|
Read-only property that returns True if the file pointer is at the end of a TextStream file; False if it is not.
object.AtEndOfStreamThe object is always the name of a TextStream object.
The AtEndOfStream property applies only to TextStream files that are open for reading, otherwise, an error occurs.The following code illustrates the use of the AtEndOfStream property:
Dim fs, a, retstring Set fs = CreateObject("Scripting.FileSystemObject") Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False) Do While a.AtEndOfStream <> True retstring = a.ReadLine ... Loop a.Close